home *** CD-ROM | disk | FTP | other *** search
/ PC for Alla 2005 May / PC för Alla 0505.iso / fullversioner / realsoft3d / data1.cab / Scripting / scripting / Intro / tabbed.js < prev    next >
Encoding:
Text File  |  2005-04-04  |  2.7 KB  |  88 lines
  1. // creates a tabbed control with number of other gadgets
  2.  
  3. // include javascript classes 
  4. include("oops/r3button.js"); 
  5. include("oops/r3tabbed.js"); 
  6. include("oops/r3cycle.js"); 
  7. include("oops/r3checkb.js"); 
  8. include("oops/r3slider.js"); 
  9. include("oops/r3window.js"); 
  10. include("oops/r3packer.js"); 
  11.  
  12. var tabLabels = ["Buttons", "Sliders", "Check Boxes", "Cycles", 0];
  13. var subPackers = new Array(tabLabels.length);
  14. var window;
  15.  
  16. // ---- create a window with a geometry manager ----
  17.  
  18. toppacker = new r3Packer(R3PA_Orientation, R3PAOF_VERTICAL); 
  19.  
  20. window = new r3Window(R3WGA_Parent, _r3gui, 
  21.                 R3WGA_Left, 200, 
  22.               R3WGA_Top, 100, 
  23.               R3WA_Title, "Window with Packer", 
  24.               R3WA_ReportCloseWindow, TRUE, 
  25.               R3WA_ReportNewSize, TRUE,
  26.               R3WA_Gmanager, toppacker);
  27.  
  28.  
  29. // --- create a tab control with a geometry manager and callback ---- 
  30.  
  31. function tabSelectHook(tab, event, activetab) 
  32. { 
  33.     for(i = 0; i < tabLabels.length; i++) {
  34.         if(i == activetab)
  35.             subPackers[i].SetStealth(FALSE);
  36.         else
  37.             subPackers[i].SetStealth(TRUE);
  38.     }
  39.     tab.FIT(R3WFP_BESTFIT);
  40. } 
  41.  
  42. // packer 
  43. packer = new r3Packer(R3PA_Orientation, R3PAOF_HORIZONTAL); 
  44.  
  45. // tabbed control
  46. tab = new r3Tabbed(R3WGA_Parent, window,
  47.                    R3TABA_Labels, tabLabels,
  48.                    R3RA_Hook, tabSelectHook,
  49.                    R3FRA_GManager, packer);
  50.  
  51.  
  52. // create a sub geometry manager for each tab.
  53.  
  54. for(i = 0; i < tabLabels.length; i++) {
  55.     subPackers[i] = new r3Packer(R3PA_Orientation, R3PAOF_VERTICAL); 
  56.     packer.ADD(R3PAPF_EXPAND | R3PAPF_FILLX | R3PAPF_FILLY, 0, subPackers[i]);
  57. }
  58.  
  59.  
  60. // create some controls for the each tab
  61. for(i = 0; i < 5; i++) { 
  62.     if(button = new r3Button(R3WGA_Parent, tab,  
  63.                   R3GA_Text, "Button " + i))
  64.         subPackers[0].ADD(R3PAPF_EXPAND | R3PAPF_FILLX | R3PAPF_FILLY, 0, button);
  65.  
  66.     if(slider = new r3Slider(R3WGA_Parent, tab,  
  67.                   R3GA_Text, "Slider " + i))
  68.         subPackers[1].ADD(R3PAPF_EXPAND | R3PAPF_FILLX, R3PAAF_ALIGN, slider);
  69.  
  70.     if(checkb = new r3Checkbox(R3WGA_Parent, tab,  
  71.                     R3GA_Text, "Check Box " + i))
  72.         subPackers[2].ADD(R3PAPF_EXPAND, R3PAAF_ALIGN, checkb);
  73.  
  74.     if(cycle = new r3Cycle(R3WGA_Parent, tab,  
  75.                         R3GA_Text, "Cycle " + i,
  76.                         R3MXILTGA_Labels, ["Low", "Medium", "High"]))
  77.         subPackers[3].ADD(R3PAPF_EXPAND | R3PAPF_FILLX, R3PAAF_ALIGN, cycle);
  78. } 
  79.  
  80. // insert tab into the window's gmanager
  81. toppacker.ADD(R3PAPF_EXPAND | R3PAPF_FILLX | R3PAPF_FILLY, 0, tab);
  82.  
  83. // set default tab
  84. tabSelectHook(tab, 0, 0);
  85.  
  86. window.FIT(R3WFP_BESTFIT); 
  87. window.REALIZE();
  88.